home *** CD-ROM | disk | FTP | other *** search
/ A Million Times Begging / A Million Times Begging - Disc 2.iso / pc / data / game1.dir / 00013.ls < prev    next >
Encoding:
Text File  |  1998-05-14  |  551 b   |  34 lines
  1. on exitFrame
  2.   global wtime, box1, box2, box3, ans
  3.   if wtime <= the ticks then
  4.     case ans of
  5.       5:
  6.         if box1 = 0 then
  7.           go("bad")
  8.           exit
  9.         else
  10.           go("hap")
  11.           exit
  12.         end if
  13.       6:
  14.         if box2 = 0 then
  15.           go("bad")
  16.           exit
  17.         else
  18.           go("hap")
  19.           exit
  20.         end if
  21.       7:
  22.         if box3 = 0 then
  23.           go("bad")
  24.           exit
  25.         else
  26.           go("hap")
  27.           exit
  28.         end if
  29.     end case
  30.   end if
  31.   bgmcheck()
  32.   go(the frame - 1)
  33. end
  34.